Oben

Schräg

Halbschräg

Halboben

Seite

Schnitte

Ebene Welle

Version Stand
02.11.2020
Andreas Jäger

Stand

Welle

Erreger

Höhenlinien

Erreger

L = 4.5 (slider from 4 to 6, step 0.01)
T = 1 (slider from 0 to 2, step 1)
t = 0 (slider from 0 to 4, step π / 1000)
view: 3
bS = false
d = false
e = true
phi1: 4.7437
A = 1.68 (slider from 0 to 6, step 0.01)
TT: 2^(T)
f(x, y) = If[0 ≤ x ∧ y ≥ 0, (A * sin(((2 * π) * (t / TT - x / L))))]
b = Sphere((0, 0, (A * sin(((2 * π) * t / TT)))), 0.2)
a = CurveCartesian(u, 0, (A * sin(((2 * π) * (t / TT - u / L)))), u, 0, 100)
g = Segment((0, 0, (A * sin(((2 * π) * t / TT)))), (0, 100, (A * sin(((2 * π) * t / TT)))))
c: L / T
Text2 = LaTeX(TT, true, true)
l1 = Sequence(If[t / TT - 1 / 4 + i ≥ 0, Segment[((L * (t / TT - 1 / 4 + i)), 0, A), ((L * (t / TT - 1 / 4 + i)), 100, A)]], i, -5, 5)
l2 = Sequence(If[t / TT + 1 / 4 + i ≥ 0, Segment[((L * (t / TT + 1 / 4 + i)), 0, (-A)), ((L * (t / TT + 1 / 4 + i)), 100, (-A))]], i, -5, 5)
Text3: "T = " + TT + ""
Text4: "A = " + A + ""
Text5: "t = " + t + ""
Text6: "λ = " + L + ""
h = false
bE = true